C-------------------------------------- ENTHALPY TABLE OF HO -----HOT
C     EXTRAPOLATED ABOVE 6000 K
C-----------------------------------------------------------------HOT
      DATA (HK(N,14),N=1,50)
     & /0.0000D+00, 7.2500D-01, 1.4810D+00, 2.2050D+00, 2.9170D+00,
     &  3.6240D+00, 4.3290D+00, 5.0370D+00, 5.7480D+00, 6.4670D+00,
     &  7.1950D+00, 7.9340D+00, 8.6830D+00, 9.4440D+00, 1.0215D+01,
     &  1.0997D+01, 1.1788D+01, 1.2589D+01, 1.3399D+01, 1.4216D+01,
     &  1.5041D+01, 1.5873D+01, 1.6712D+01, 1.7556D+01, 1.8406D+01,
     &  1.9261D+01, 2.0121D+01, 2.0986D+01, 2.1854D+01, 2.2727D+01,
     &  2.3603D+01, 2.4483D+01, 2.5366D+01, 2.6252D+01, 2.7141D+01,
     &  2.8033D+01, 2.8927D+01, 2.9824D+01, 3.0724D+01, 3.1626D+01,
     &  3.2530D+01, 3.3437D+01, 3.4345D+01, 3.5256D+01, 3.6168D+01,
     &  3.7082D+01, 3.7999D+01, 3.8917D+01, 3.9836D+01, 4.0758D+01/
      DATA (HK(N,14),N=51,100)
     & /4.1681D+01, 4.2613D+01, 4.3540D+01, 4.4469D+01, 4.5400D+01,
     &  4.6333D+01, 4.7268D+01, 4.8204D+01, 4.9142D+01, 5.0081D+01,
     &  5.1023D+01, 5.1964D+01, 5.2906D+01, 5.3847D+01, 5.4789D+01,
     &  5.5730D+01, 5.6671D+01, 5.7613D+01, 5.8554D+01, 5.9496D+01,
     &  6.0437D+01, 6.1379D+01, 6.2320D+01, 6.3262D+01, 6.4203D+01,
     &  6.5144D+01, 6.6086D+01, 6.7027D+01, 6.7969D+01, 6.8910D+01,
     &  6.9852D+01, 7.0793D+01, 7.1735D+01, 7.2676D+01, 7.3617D+01,
     &  7.4559D+01, 7.5500D+01, 7.6442D+01, 7.7383D+01, 7.8325D+01,
     &  7.9266D+01, 8.0208D+01, 8.1149D+01, 8.2090D+01, 8.3032D+01,
     &  8.3973D+01, 8.4915D+01, 8.5856D+01, 8.6798D+01, 8.7739D+01/
      DATA (HK(N,14),N=101,150)
     & /8.8681D+01, 8.9622D+01, 9.0563D+01, 9.1505D+01, 9.2446D+01,
     &  9.3388D+01, 9.4329D+01, 9.5271D+01, 9.6212D+01, 9.7154D+01,
     &  9.8095D+01, 9.9036D+01, 9.9978D+01, 1.0092D+02, 1.0186D+02,
     &  1.0280D+02, 1.0374D+02, 1.0469D+02, 1.0563D+02, 1.0657D+02,
     &  1.0751D+02, 1.0845D+02, 1.0939D+02, 1.1033D+02, 1.1128D+02,
     &  1.1222D+02, 1.1316D+02, 1.1410D+02, 1.1504D+02, 1.1598D+02,
     &  1.1692D+02, 1.1787D+02, 1.1881D+02, 1.1975D+02, 1.2069D+02,
     &  1.2163D+02, 1.2257D+02, 1.2351D+02, 1.2446D+02, 1.2540D+02,
     &  1.2634D+02, 1.2728D+02, 1.2822D+02, 1.2916D+02, 1.3010D+02,
     &  1.3105D+02, 1.3199D+02, 1.3293D+02, 1.3387D+02, 1.3481D+02/
      DATA (HK(N,14),N=151,201)
     & /1.3575D+02, 1.3669D+02, 1.3764D+02, 1.3858D+02, 1.3952D+02,
     &  1.4046D+02, 1.4140D+02, 1.4234D+02, 1.4328D+02, 1.4423D+02,
     &  1.4517D+02, 1.4611D+02, 1.4705D+02, 1.4799D+02, 1.4893D+02,
     &  1.4987D+02, 1.5082D+02, 1.5176D+02, 1.5270D+02, 1.5364D+02,
     &  1.5458D+02, 1.5552D+02, 1.5646D+02, 1.5741D+02, 1.5835D+02,
     &  1.5929D+02, 1.6023D+02, 1.6117D+02, 1.6211D+02, 1.6305D+02,
     &  1.6400D+02, 1.6494D+02, 1.6588D+02, 1.6682D+02, 1.6776D+02,
     &  1.6870D+02, 1.6964D+02, 1.7059D+02, 1.7153D+02, 1.7247D+02,
     &  1.7341D+02, 1.7435D+02, 1.7529D+02, 1.7623D+02, 1.7718D+02,
     &  1.7812D+02, 1.7906D+02, 1.8000D+02, 1.8094D+02, 1.8188D+02,
     &  1.8282D+02/
